let $result :=
	let $wines := doc("wines.xml")/wines
	for $wine in $wines/wine
	where $wine/@dateCreated <= fn:current-dateTime()
	order by $wine/@dateCreated descending
	return <li>{$wine/name}</li>
return $result[position() <= 5]

